Results

ggplotly(draw_chart("create"))

## Warning in read.table(file = file, header = header, sep = sep, quote = quote, :
## niekompletna końcowa linia znaleziona przez 'readTableHeader' w 'out/create.csv'

ggplotly(draw_chart("read"))

## Warning in read.table(file = file, header = header, sep = sep, quote = quote, :
## niekompletna końcowa linia znaleziona przez 'readTableHeader' w 'out/read.csv'

ggplotly(draw_chart("read_range"))

## Warning in read.table(file = file, header = header, sep = sep, quote =
## quote, : niekompletna końcowa linia znaleziona przez 'readTableHeader' w 'out/
## read_range.csv'

ggplotly(draw_chart("update"))

## Warning in read.table(file = file, header = header, sep = sep, quote = quote, :
## niekompletna końcowa linia znaleziona przez 'readTableHeader' w 'out/update.csv'